Explain in a comment why the default background-setting code is still

here, although xterm.l and rxvt.el do that better.

diff --git a/lisp/startup.el b/lisp/startup.el
index 12097f5fe8f245f797e7a3d1134523ea3877464d..932f12bf9b9d6e59a2aea8e31703d433d0105fbd 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -514,6 +514,9 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
                             (or (null bg)
                                 (member bg '(unspecified "unspecified-bg")))))
                  (setq term (getenv "TERM"))
+                 ;; Some files in lisp/term do a better job with the
+                 ;; background mode, but we leave this here anyway, in
+                 ;; case they remove those files.
                  (if (string-match "^\\(xterm\\|rxvt\\|dtterm\\|eterm\\)"
                                    term)
                      (setq frame-background-mode 'light)))